-- card: 3018 from stack: in
-- bmap block id: 7746
-- flags: 0000
-- background id: 2764
-- name: 


-- part 2 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=54 top=37 right=70 bottom=463
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 33
-- text size: 24
-- style flags: 10240
-- line height: 32
-- part name: 


-- part 3 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=107 top=70 right=136 bottom=404
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 33
-- text size: 12
-- style flags: 2304
-- line height: 16
-- part name: 


-- part 4 (field)
-- low flags: 00
-- high flags: 0007
-- rect: left=44 top=143 right=286 bottom=466
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 21
-- text size: 12
-- style flags: 0
-- line height: 20
-- part name: 


-- part 6 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=480 top=21 right=53 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 21700 / 21700
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: homeButt
----- HyperTalk script -----
on mouseUp


  go home
end mouseUp


-- part contents for background part 17
----- text -----
StripChar

-- part contents for background part 18
----- text -----
Mike Gleason Jr.

-- part contents for background part 19
----- text -----
XFCN

-- part contents for background part 20
----- text -----
StripChar("string","charToStrip" [,"LeadingOnly"])

-- part contents for background part 21
----- text -----
This XFCN will strip off a certain character from a string, given the string, and the character to look for.  If you specify "LeadingOnly", all characters of the type you specify wil l be stripped until it encounters a different character.


-- part contents for background part 23
----- text -----
put stripchar("Nebraska Cornhuskers","s") into msg  --> "Nebraka Cornhuker"
put stripchar("     0.032"," ","LeadingOnly") into n --> "0.032"
put stripchar("AARDVARK","A","LeadingOnly") into animal --> "RDVARK"



-- part contents for card part 2
----- text -----
Mike's Favorite Externals

-- part contents for card part 3
----- text -----

Compiled by Mike Gleason Jr.
release 1B • February 22, 1990.

-- part contents for card part 4
----- text -----
This stack contains all of my favorite XCMD's and XFCNs (Duh).  I wrote about half of them, so some of these are completely new.  Others were written by Gary Bond and Jon Wind.  To install them, you will need to use ResEdit or the ResCopy stack. If you would like to make your own externals, get a copy of "XCMD's for HyperCard" by Gary Bond.  It is indispensable!  I couldn't have written any of these without the help of his wonderful book.  Each card documents one external.  I have provided the format and some examples for each one, so you should have no problem figuring them out. Source code for all of my externals and externals by Gary Bond are available from me;  All source code and Object code are copyrighted, so you can't sell ANY of these for profit!

If you want copies of source code (send a disk and 2 stamps), make suggestions or criticisms, or report bugs, you can reach me at:
    Mike Gleason
    5705 N 117th Plaza
    Omaha, NE  68164

Or, for a long shot, you can try to leave me email on GEnie at "M.Gleason".
I am rarely on GEnie though, so your mail could get deleted before I get a chance to read it.

Bug (?) Note:  For reasons I cannot explain, sometimes Hypercard prefers strings to be quoted, othertimes not.  Just now this worked:
   newbutt home
but this did not:
   newbutt "home"
So if you can't seem to get an external to work, try varying on that.

Onward!